use "dataset_fort_worth_police_violence", clear

gen month = month(date)
gen year = year(date)

replace name = "Atatiana Jefferson" if regex(name, "Atatiana")

#delimit;

gr tw
	(sc hits_s month, col(black))
	(sc hits_s month, mlab(name) msym(none) mlabangle(90) mlabpos(1)
		mlabsize(medlarge) mlabcol(gray))
	,
		by(year, note("") imargin(zero) rows(1) legend(off))
		plotregion(style(none))
		ylab(0(20)120, angle(horiz))
		xtitle("Month")
		ytitle("Coverage")
		xlab(1(1)12, labsize(vsmall))
		subtitle(, fcol(none) lwid(none))
		xsize(2)
		ysize(1)
		xline(13)
		;


#delimit cr

gr export "_output/figure A3.pdf", replace		
